object fmUserList: TfmUserList
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  Caption = #36890#35759#24405
  ClientHeight = 485
  ClientWidth = 796
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object lblBrowser: TLabel
    Left = 0
    Top = 0
    Width = 796
    Height = 25
    Align = alTop
    Alignment = taCenter
    AutoSize = False
    Caption = #36890#35759#24405
    Color = 12937777
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
    ExplicitTop = 26
    ExplicitWidth = 552
  end
  object grdBrowser: TcxGrid
    Left = 0
    Top = 25
    Width = 796
    Height = 460
    Align = alClient
    TabOrder = 0
    LookAndFeel.Kind = lfOffice11
    object tvBrowser: TcxGridDBBandedTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsBrowser
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skCount
          Column = tvBrowserColumn1
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsSelection.CellSelect = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      OptionsView.Indicator = True
      OptionsView.BandHeaders = False
      OptionsView.FixedBandSeparatorWidth = 0
      Bands = <
        item
        end
        item
          Visible = False
        end>
      object tvBrowserId: TcxGridDBBandedColumn
        DataBinding.FieldName = 'bu_id'
        Visible = False
        Position.BandIndex = 0
        Position.ColIndex = 0
        Position.RowIndex = 0
      end
      object tvBrowserColumn1: TcxGridDBBandedColumn
        Caption = #29992#25143#21517
        DataBinding.FieldName = 'bu_name'
        Options.Editing = False
        Width = 71
        Position.BandIndex = 0
        Position.ColIndex = 1
        Position.RowIndex = 0
      end
      object tvBrowserColumn2: TcxGridDBBandedColumn
        Caption = #21517#23383
        DataBinding.FieldName = 'bu_cname'
        Options.Editing = False
        Width = 74
        Position.BandIndex = 0
        Position.ColIndex = 2
        Position.RowIndex = 0
      end
      object tvBrowserColumn3: TcxGridDBBandedColumn
        Caption = #30452#23646#39046#23548
        DataBinding.FieldName = 'bu_parent'
        Options.Editing = False
        Width = 79
        Position.BandIndex = 0
        Position.ColIndex = 4
        Position.RowIndex = 0
      end
      object tvBrowserColumn4: TcxGridDBBandedColumn
        Caption = #30005#35805
        DataBinding.FieldName = 'bu_tel'
        Options.Editing = False
        Width = 82
        Position.BandIndex = 0
        Position.ColIndex = 7
        Position.RowIndex = 0
      end
      object tvBrowserColumn5: TcxGridDBBandedColumn
        Caption = #30701#21495
        DataBinding.FieldName = 'bu_short'
        Options.Editing = False
        Width = 75
        Position.BandIndex = 0
        Position.ColIndex = 8
        Position.RowIndex = 0
      end
      object tvBrowserColumn6: TcxGridDBBandedColumn
        Caption = #25163#26426
        DataBinding.FieldName = 'bu_mobile'
        Options.Editing = False
        Width = 76
        Position.BandIndex = 0
        Position.ColIndex = 10
        Position.RowIndex = 0
      end
      object tvBrowserColumn7: TcxGridDBBandedColumn
        Caption = 'Email'
        DataBinding.FieldName = 'bu_mail'
        Options.Editing = False
        Width = 141
        Position.BandIndex = 0
        Position.ColIndex = 13
        Position.RowIndex = 0
      end
      object tvBrowserColumn8: TcxGridDBBandedColumn
        Caption = #37096#38376
        DataBinding.FieldName = 'bu_depart'
        Options.Editing = False
        Width = 98
        Position.BandIndex = 0
        Position.ColIndex = 3
        Position.RowIndex = 0
      end
      object tvBrowserColumn9: TcxGridDBBandedColumn
        Caption = 'IP'#30005#35805
        DataBinding.FieldName = 'bu_ling'
        Width = 75
        Position.BandIndex = 0
        Position.ColIndex = 9
        Position.RowIndex = 0
      end
      object tvBrowserColumn10: TcxGridDBBandedColumn
        Caption = #32844#20301
        DataBinding.FieldName = 'bu_jobtitle'
        Width = 80
        Position.BandIndex = 0
        Position.ColIndex = 5
        Position.RowIndex = 0
      end
      object tvBrowserColumn11: TcxGridDBBandedColumn
        Caption = #20837#32844#26102#38388
        DataBinding.FieldName = 'bu_dateofhire'
        Width = 80
        Position.BandIndex = 0
        Position.ColIndex = 6
        Position.RowIndex = 0
      end
      object tvBrowserColumn12: TcxGridDBBandedColumn
        Caption = #35745#31639#26426#21517
        DataBinding.FieldName = 'bu_computername'
        Width = 80
        Position.BandIndex = 0
        Position.ColIndex = 11
        Position.RowIndex = 0
      end
      object tvBrowserColumn13: TcxGridDBBandedColumn
        Caption = 'IP'#22320#22336
        DataBinding.FieldName = 'bu_ipaddress'
        Width = 100
        Position.BandIndex = 0
        Position.ColIndex = 12
        Position.RowIndex = 0
      end
    end
    object lvBrowser: TcxGridLevel
      GridView = tvBrowser
    end
  end
  object rdaBrowser: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.MethodName = 'SQLGetData'
    GetDataCall.Params = <
      item
        Name = 'Result'
        DataType = rtBinary
        Flag = fResult
      end
      item
        Name = 'aSQLText'
        DataType = rtString
        Flag = fIn
      end
      item
        Name = 'aIncludeSchema'
        DataType = rtBoolean
        Flag = fIn
      end
      item
        Name = 'aMaxRecords'
        DataType = rtInteger
        Flag = fIn
      end>
    GetDataCall.Default = False
    GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
    GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
    GetDataCall.IncomingDataParameter = 'Result'
    GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
    GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
    UpdateDataCall.RemoteService = ClientDataModule.RemoteService
    GetScriptsCall.RemoteService = ClientDataModule.RemoteService
    RemoteService = ClientDataModule.RemoteService
    DataStreamer = ClientDataModule.DataStreamer
    Left = 260
    Top = 184
  end
  object tblBrowser: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'bu_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'bu_name'
        DataType = datString
        Size = 30
        Required = True
      end
      item
        Name = 'bu_cname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_pwd'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_depart'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_parent'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_tel'
        DataType = datString
        Size = 20
      end
      item
        Name = 'bu_short'
        DataType = datString
        Size = 10
      end
      item
        Name = 'bu_mobile'
        DataType = datString
        Size = 20
      end
      item
        Name = 'bu_ling'
        DataType = datString
        Size = 20
      end
      item
        Name = 'bu_mail'
        DataType = datString
        Size = 60
      end
      item
        Name = 'bu_system'
        DataType = datBoolean
        DefaultValue = '1'
      end
      item
        Name = 'bu_jobtitle'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_dateofhire'
        DataType = datDateTime
      end
      item
        Name = 'bu_computername'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_ipaddress'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bu_contractno'
        DataType = datString
        Size = 30
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rdaBrowser
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_user'
    IndexDefs = <>
    Left = 230
    Top = 184
  end
  object dsBrowser: TDADataSource
    DataSet = tblBrowser.Dataset
    DataTable = tblBrowser
    Left = 200
    Top = 184
  end
end
